#!/usr/bin/perl 
# interpolate2.pl
use warnings;

$Friday = "sunny";
print "It is \$Friday \n";